(find-tag-default-function): Fix :type.

diff --git a/lisp/progmodes/etags.el b/lisp/progmodes/etags.el
index 3735b2f0ff65f3468da224ed81399f1f29975b72..1319def4a8f5b17562aab88f6f64f2bba0128391 100644 (file)
--- a/lisp/progmodes/etags.el
+++ b/lisp/progmodes/etags.el
@@ -120,7 +120,7 @@ If nil, and the symbol that is the value of `major-mode'
 has a `find-tag-default-function' property (see `put'), that is used.
 Otherwise, `find-tag-default' is used."
   :group 'etags
-  :type 'function)
+  :type '(choice (const nil) function))
 
 (defcustom find-tag-marker-ring-length 16
   "*Length of marker rings `find-tag-marker-ring' and `tags-location-ring'."